home *** CD-ROM | disk | FTP | other *** search
/ IRIX Base Documentation 2001 May / SGI IRIX Base Documentation 2001 May.iso / usr / share / catman / p_man / cat3 / f90 / neqv.z / neqv
Encoding:
Text File  |  1998-10-30  |  4.4 KB  |  103 lines
  1. NEQV(3M)                                               Last changed: 1-6-98
  2.  
  3.  
  4. NNAAMMEE
  5.      NNEEQQVV, XXOORR - Computes logical difference
  6.  
  7. SSYYNNOOPPSSIISS
  8.      NNEEQQVV (([II==]_i,,[JJ==]_j))
  9.      XXOORR (([II==]_i,,[JJ==]_j))
  10.  
  11. IIMMPPLLEEMMEENNTTAATTIIOONN
  12.      UNICOS, UNICOS/mk, and IRIX systems
  13.  
  14. SSTTAANNDDAARRDDSS
  15.      Compiler extension to Fortran 90
  16.  
  17. DDEESSCCRRIIPPTTIIOONN
  18.      NNEEQQVV and XXOORR are two names for the same routine.  NNEEQQVV and XXOORR are
  19.      elemental functions for the CF90 compiler.
  20.  
  21.      _a_r_g and _i and _j can be of type Boolean, integer, real, logical, or
  22.      Cray pointer.
  23.  
  24. NNOOTTEESS
  25.      These routines are outmoded for the CF90 compiler.  Refer to the
  26.      _F_o_r_t_r_a_n _L_a_n_g_u_a_g_e _R_e_f_e_r_e_n_c_e _M_a_n_u_a_l, _V_o_l_u_m_e _3, publication SR-3905, for
  27.      information about outmoded features and their preferred standard
  28.      alternatives.  The name of this intrinsic cannot be passed as an
  29.      argument.
  30.  
  31. CCAAUUTTIIOONNSS
  32.      Unexpected results can occur when Boolean functions are declared
  33.      external and then used with logical arguments.  The external Boolean
  34.      functions always treat their arguments as type Boolean and return a
  35.      Boolean result on UNICOS and UNICOS/mk systems.  On IRIX systems, they
  36.      return an integer result.
  37.  
  38. RREETTUURRNN VVAALLUUEESS
  39.      When given two arguments of type logical, NNEEQQVV and XXOORR compute a
  40.      logical difference and return a logical result.  When given two
  41.      arguments of type Boolean, integer, real, or pointer, NNEEQQVV and XXOORR
  42.      compute a bit-wise logical difference and return a Boolean result.  No
  43.      type conversion occurs.
  44.  
  45.      The following tables show both the logical difference and bit-wise
  46.      logical difference.  NNEEQQVV is shown in the tables, but XXOORR produces
  47.      identical results.
  48.  
  49.      -----------------------------------------------------------------
  50.         Logical        Logical          (Logical Variable 1) NNEEQQVV
  51.       Variable 1     Variable 2           (Logical Variable 2)
  52.      -----------------------------------------------------------------
  53.            T              T                         F
  54.            T              F                         T
  55.            F              T                         T
  56.            F              F                         F
  57.      -----------------------------------------------------------------
  58.  
  59.      --------------------------------------------------------------
  60.         Bit of        Bit of          (Bit of Variable 1) NNEEQQVV
  61.       Variable 1    Variable 2           (Bit of Variable 2)
  62.      --------------------------------------------------------------
  63.           1             1                        0
  64.           1             0                        1
  65.           0             1                        1
  66.           0             0                        0
  67.      --------------------------------------------------------------
  68.  
  69. EEXXAAMMPPLLEESS
  70.      The following section of Fortran code shows the NNEEQQVV function used
  71.      with two arguments of type logical.  XXOORR is used in the same manner
  72.      and produces the same results.
  73.  
  74.           LOGICAL L1, L2, L3
  75.           ...
  76.           L3 = NEQV(L1,L2)
  77.  
  78.      The following section of Fortran code shows the NNEEQQVV function used
  79.      with two arguments of type integer.  XXOORR is used in the same manner
  80.      and produces the same results.  The bit patterns of the arguments and
  81.      results are also given.  For clarity, only the rightmost 8 bits are
  82.      shown.
  83.  
  84.    INTEGER I1, I2, I3
  85.    I1 = 12
  86.    I2 = 10
  87.    ...
  88.    I3 = NEQV(I1,I2)
  89.        -------------------------------     -------------------------------
  90.       | 0 | 0 | 0 | 0 | 1 | 1 | 0 | 0 |   | 0 | 0 | 0 | 0 | 1 | 0 | 1 | 0 |
  91.        -------------------------------     -------------------------------
  92.                         I1                               I2
  93.  
  94.                      -------------------------------
  95.                     | 0 | 0 | 0 | 0 | 0 | 1 | 1 | 0 |
  96.                      -------------------------------
  97.                                        I3
  98.  
  99. SSEEEE AALLSSOO
  100.      _I_n_t_r_i_n_s_i_c _P_r_o_c_e_d_u_r_e_s _R_e_f_e_r_e_n_c_e _M_a_n_u_a_l, publication SR-2138, for the
  101.      printed version of this man page.
  102.  
  103.